home *** CD-ROM | disk | FTP | other *** search
/ SOHO - Exploring the Sun - 2003 Update / SOHO - Exploring the Sun - 2003 Update.iso / pc / data / main.dcr / scripts_94.ls < prev    next >
Encoding:
Text File  |  2003-02-25  |  849 b   |  33 lines
  1. on prepareFrame
  2.   global nappi_sprite, atmoY
  3.   ShowAllSprites()
  4.   ClrCursorS()
  5.   WaitCursor()
  6.   set the directToStage of member "sml_sun" to 0
  7.   set the directToStage of member the member of sprite 110 to 0
  8.   set the member of sprite nappi_sprite to member "pieninappi"
  9.   set the locV of sprite nappi_sprite to 490
  10. end
  11.  
  12. on exitFrame
  13.   global jump_back
  14.   set the visible of sprite 113 to 1
  15.   set the visible of sprite 117 to 1
  16.   set the visible of sprite 118 to 1
  17.   set the visible of sprite 119 to 1
  18.   set jump_back to the frame
  19.   set the directToStage of member the member of sprite 110 to 1
  20.   set the directToStage of member "sml_sun" to 1
  21.   ClrCursorS()
  22.   set f to 2
  23.   repeat while f < 20
  24.     KasiCursor(f)
  25.     set f to f + 1
  26.   end repeat
  27.   KasiCursor(30)
  28.   KasiCursor(31)
  29.   PlusCursor(80)
  30.   cursor(-1)
  31.   set the movieRate of sprite 110 to 1
  32. end
  33.